Fix previous change.

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index eca68f559304fc774e5e93a8ef965dfa826285b1..024333c4a88578d0ac4e0ea3a8765e682afbe6de 100644 (file)
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -917,7 +917,7 @@
   (setq c #x0100)
   (while (<= c #x02AF)
     (modify-category-entry (decode-char 'ucs c) ?l)
-    (setq c (1+ 1)))
+    (setq c (1+ c)))
 
   (setq c #x0100)
   (while (<= c #x0177)